(graft_intervals_into_buffer): When TREE is null,

pass buffer as 2nd arg to reproduce_tree.

diff --git a/src/intervals.c b/src/intervals.c
index 0922a074a96dc57c1ba1ea1e4663ed03da4e4299..402b96c4e3725125adaa86d10eaf49aa6c45933e 100644 (file)
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -1114,7 +1114,9 @@ graft_intervals_into_buffer (source, position, buffer)
         simply copy over the interval structure. */
       if ((BUF_Z (buffer) - BUF_BEG (buffer)) == TOTAL_LENGTH (source))
        {
-         buffer->intervals = reproduce_tree (source, tree->parent);
+         Lisp_Object buf;
+         XSET (buf, Lisp_Buffer, buffer);
+         buffer->intervals = reproduce_tree (source, buf);
          /* Explicitly free the old tree here. */
 
          return;